   
         The JSDlgBox component provides browsing dialogue windows for use
          in VBScript. The functions are simple with no optional arguments. Each returns
          the file path chosen or the color chosen. (You must do the actual opening, saving, etc.)
            The File Open browsing window opens with the filter set to "All Files *.*",
          with single selection.
            The File Save As browsing window works the same way.
            The Choose Color window opens with full color choice. Custom color settings are not available,
          being irrelevant in the life of a VBScript.
           
DEPENDENCIES: 
      
        Use of this component requires:
        the VB6 Runtime Files

 
REGISTERING COMPONENTS:
         
           The component must be "registered" in Windows before use.
            You can use the VBScript CompRegister.vbs to register or un-register any component.
             The script also contains tips (commented) for registering a component remotely.
          --------------------------------

            To register JSDlgBox.dll by hand:
              Go to Start Menu/Run.
              Enter:
                 RegSvr32 C:\Windows\System\JSDlgBox.dll
                   (one space after "32". 2nd part should be path to where you've put JSDlgBox.dll.)
              Click OK.
               You should see a message box confirming that the component has been registered.
            
            To unregister the component:
                  RegSvr32 -U C:\Windows\System\JSDlgBox.dll
            
            These operations require that you have RegSvr32.exe on your computer.
            

TO USE THE COMPONENT IN VBSCRIPT:

           Dim ObjVar 
           Set ObjVar = CreateObject("JSDlgBox.Browser")



METHODS:


            OpenBox -- String function. Displays the File Open dialogue box.
            Returns file full path if a file is chosen, else returns "".
            ----------------
            SaveBox -- String function. Displays the File Save As dialogue box.
            Returns file full path if a file is chosen, else returns "".
            ----------------
            ColorBoxRGB -- Long function. Displays the Choose Color dialogue box.
            Returns color as RGB long if a color is chosen, else returns 0.
            ----------------
            ColorBoxHex -- String function. Displays the Choose Color dialogue box.
            Returns color hex code as string if a color is chosen, else returns "".
            ----------------


EXAMPLES:

               dim dlg, fso, ts, s
               Set fso = CreateObject("Scripting.FileSystemObject")
               set dlg = CreateObject("JSDlgBox.Browser")
                s = dlg.OpenBox
                  if s <> "" then
                    set ts = fso.OpenTextFile(s, 1)
                              ........etc.
                
             
               dim dlg, fso, ts, s, s1
               Set fso = CreateObject("Scripting.FileSystemObject")
               set dlg = CreateObject("JSDlgBox.Browser")
                  s1 = [text to be saved]
                  s = dlg.SaveBox
                     if s <> "" then
                        set ts = fso.CreateTextFile(s)
                            ts.Write s1
                            ts.Close
                        set ts = nothing
                     end if
             
               dim dlg, col
                 col = dlg.ColorboxRGB
                   if col <> 0 then
                      msgbox cstr(col)
                  end if

_________________________________________________________


License:

You use all script code and components from JSWare at your own risk.

  The components (compiled DLL and EXE files) may be used for personal or
commercial purposes. No payment or attribution is required for either use.
The components may be redistributed if they are required as support files 
for scripts or software that you have written.
   Also, the script code may be used freely, in part or as whole scripts,
for any purpose, personal or commercial, without payment or attribution.

  I ask only that you not redistribute these scripts and components, except
as required for your direct use. Instead, please direct others to obtain copies
of JSWare scripts and components directly from www.jsware.net.

  Also, none of the code here may be redistributed under another license. If a 
work using code from JSWare is distributed with restrictions of any kind 
the code from JSWare must be kept exempt from those restrictions. 
This includes, but is not limited to, code sold for profit, code with usage restrictions
and code distributed as so-called "Open Source" with redistribution restrictions. 

                                         Joe Priestley


JSWare
www.jsware.net
jsware@jsware.net  